home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-02
/
evaltp5.zip
/
EVALUATE.DOC
< prev
next >
Wrap
Text File
|
1993-01-04
|
1KB
|
23 lines
Evaluate TPU for Turbo Pascal 5.5
10/11/89
Unit from Don McIver
SCB CheckBook Program
The Unit EvalValue is a recurrsive Function that will take a string[255]
and return the arithmatic answwer to the string. To see what functions
are supported look at the Eval.Pas file for Token listings.
The Function EvalValue is used in a Command Line Argument to demo its
capacity. I've asked Don to develop a more comprehensive usage of his
Eval Function which will include Memory Variables etc. He'll eventually
get this out. Until then I thought I would offer his basic unit from his
SCB Source Files.
The use of recursion makes this a fast and compact method of dealing with
arithmatic operations in programs.
Hope you enjoy.
Pat Dant
10/10/1989